***Creating Figure SI-1: Agency number by year***
 
use number of agencies by year.dta, clear 
 
 
 twoway (line executiveagency fiscalyear, lcolor(red) lpattern(solid)) (line totalnumber fiscalyear, lcolor(purple) lpattern(tight_dot)) ///
 (line independentagency fiscalyear, lcolor(blue) lpattern(dash)), ylabel(, labels) xline(1923, lpattern(dash) lcolor(green)) /// 
 title("Figure SI-I. Number of Agencies By Year, 1894-1940") scheme(s2mono)


